Public Class frmMain

    Public _player As New OCDSCore()
    Dim _fullscreen As New frmFullscreen()
    Dim _videowindow As New ucWindow()

    Private Sub frmMain_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        ucControlsMain.Init(_player, OpenFileDialog, _videowindow, pnWindow, _fullscreen)
        _videowindow.Size = pnWindow.Size()
        Me.pnWindow.Controls.Add(_videowindow)
        _player.Init(_videowindow.Handle, ucControlsMain)
    End Sub

    Private Sub frmMain_SizeChanged(sender As System.Object, e As System.EventArgs) Handles MyBase.SizeChanged
        _videowindow.Size = pnWindow.Size
    End Sub
End Class

